From tuc Fri Oct 20 09:38:09 1995 Received: from ifm.liu.se (root@ifm.liu.se [130.236.160.6]) by valhalla.stormking.com (8.6.12/8.6.12) with ESMTP id JAA18008 for ; Fri, 20 Oct 1995 09:33:26 -0400 Received: from bottom.ifm.liu.se (bottom.ifm.liu.se [130.236.162.17]) by ifm.liu.se (8.6.9/8.6.9) with ESMTP id OAA24557 for ; Fri, 20 Oct 1995 14:33:19 +0100 From: Magnus Paulsson Received: (mapau@localhost) by bottom.ifm.liu.se (8.6.9/8.6.9) id OAA02220 for corewar-l@stormking.com; Fri, 20 Oct 1995 14:33:15 +0100 Date: Fri, 20 Oct 1995 14:33:15 +0100 Message-Id: <199510201333.OAA02220@bottom.ifm.liu.se> To: corewar-l@stormking.com Subject: myZizzor X-Sun-Charset: US-ASCII Just thought I'd publish myZizzors, not very god against the the great big white. Actually, I've changed one line from the myZizzors that are on the hill, that is the line that makes it possible for myZizzors to beat Die Hard. (You have to wait untill I publish myVamp for that part) >Program "Die Hard" (length 99) by "P.Kline" >(contact address "PDK@ADMIN.DRAKE.EDU"): >;strategy minimal kill+, maximal survival >myZizzor wins: 142 ;as published it will probably beat Die Hard 1% >Die Hard wins: 67 >Ties: 41 I think these 8 lines of code is quite effective! /Magnus Paulsson ------------------------------------------------------------------------------------------------------------ ;redcode-94 ;name myZizzor ;author Paulsson ;strategy Cissors (or whatever way you spell it) ;startegy One pass -> coreclear. Tiny I'd say. ;strategy Let's se how hard Die Hard is this time :-) ;I've changed it from the hill, wouldn't want ;to tell you how to kill Die Hard :-) ;assert CORESIZE > 1 org start step equ 8 i for step dat 1,1 ;8 bytes of target to hit (same as step size) rof check dat 1,0 ;when bombed -> coreclear i for 40 dat 0,0 ;safety distance to program rof start p add.ab #step,#check+100 ; \ (doubles as ptr in coreclear!) rep jmz.f p,@p ; / scan 1/2 c mov.i b2,>p ; carpet bomb jmz.b rep,check ; check if time to coreclear b2 spl #b3-p,b1-p+2 ; core clear, first bomb used (in spl/dat coreclear) mov.i *p,>p ; clear djn.f -1,